1 IFSO=0THENSO=1:LOAD"IRRSOUND BY S.D.",8,1 10 POKE53280,0:POKE53281,0:POKE53265,27:PRINT"[147]":POKE808,225:POKE775,200 20 PRINT"[153]< [154]__ [156]IRRLAND [154]__ [153]>":FORX=1TO3000:NEXTX 21 GOTO63000 25 SYS50176 30 PRINT"WRITTEN BY #$%SSEUS IN 01/02 '96" 31 PRINT"IT'S FREEWARE!" 32 PRINT"[151]MUSIC BY SCORPION DESIGNS!!" 33 GOTO30000 50 PRINT"[153]DIESE GEGICHTE SPIELT IN IRRLAND. WO IT" 60 PRINT"LIEGT? WEI\ ICH DOCH NICHT! KOMM ICH" 70 PRINT"DA HER, ODER WAS? WILLST DU ETWA BE-" 80 PRINT"HAUPTEN, ICH SEI IRR???? DU HAST RECHT!" 90 PRINT"[159]DU BIST IGNAZIUS WURZELSEPP [159]UND KOMMST" 100 PRINT"AUS... BAYERN! WAS DICH NACH IRRLAND" 110 PRINT"VERSCHL]GT? DEIN URLAUB, IDIOT! ABER" 120 PRINT"GANZ SO HATTEST DU IHN DIR LEIDER NICHT" 130 PRINT"VORGESTELLT... DIESES LAND, IN DAS DU" 140 PRINT"WOLLTEST, HEI\T IRLAND, DOCH LEIDER " 150 PRINT"BIST DU AUS VERSEHEN NACH IRRLAND GE-" 160 PRINT"LANGT! WIE, WEI\T DU AUCH NICHT MEHR, " 170 PRINT"ABER JETZT BIST DU HALT DA UND MU\T" 180 PRINT"SEHEN, WIE'S WEITERGEHT! UND WIE DU " 190 PRINT"WIEDER ZUR^CK NACH HAUSE, NACH HINTER-" 200 PRINT"FURZING KOMMST..." 210 PRINT"[129]DU MU\T DICH ALSO DURCH'S LAND BEWE-" 220 PRINT"GEN UND DICH IRGENDWIE DURCHFRAGEN..." 230 PRINT"ABER VORSICHT - IT'S IRR MAN!" 240 GETA$:IFA$=""THEN240 250 IFA$<>""THEN260 260 PRINT"WIE DU SPIELEN MU\T? MIT DER TASTATUR," 270 PRINT"WAS DENKST DU DENN? ACH SO, WIE DU SPI-" 280 PRINT"ELEN MU\T... NA JA, ICH BIN JA NICHT" 290 PRINT"SO, VERRAT ICH'S DIR HALT:" 300 PRINT"[155]ALSO, WIE BEI JEDEM NORMALEN TEXTADVEN-" 310 PRINT"TURE FINDEST DU OBEN AM BILDSCHIRM EI-" 320 PRINT"NEN TEXT! DER VERR]T DIR, WO DU BIST" 330 PRINT"UND NOCH EINIGES MEHR... (ABER NUR," 340 PRINT"WENN DU AUCH GANZ IRR BIST!)" 350 PRINT"[152]DA DIES ABER KEIN NORMALES ADVENTURE" 360 PRINT"IST, H[RT NUN DIE ]HNLICHKEIT MIT" 370 PRINT"SELBIGEN AUCH SCHON AUF! NIX MIT GEHE" 380 PRINT"N ODER T[TE MANN... NEIN! DU BEKOMMST" 390 PRINT"ZU JEDEM TEXT  VIER M[GLICHKEITEN[152]!" 400 PRINT"JEDOCH HILFT DIR JEWEILS NUR EINE WEI-" 410 PRINT"TER. DIE RESTLICHEN DREI SIND ENTWEDER" 420 PRINT"EINFACH FALSCH, ODER.... DU WIRST SO-" 430 PRINT"FORT ELIMINIERT, WENN DU SIE W]HLST!!" 440 PRINT"(GEMEIN SEI, FIES LACH...)" 442 GETA$:IFA$=""THEN442 444 IFA$<>""THEN450 450 PRINT"[156]WIE DU ELIMINIERT WIRST? DAS STEHT DANN" 460 PRINT"SCHON DA! JEDENFALLS F^HRT DAS PROG" 470 PRINT"EINEN WEICH-RESET AUS, W]HREND DU NOCH" 480 PRINT"VERWUNDERT DEINE TODESMELDUNG ANGLOTZT!" 490 PRINT"SO HABEN AUCH FLEISSIGE RUN/STOP-" 500 PRINT"DR^CKER KEINE CHANCE, DEN ELIMINIER-" 510 PRINT"VORGANG FR^HZEITIG ZU BEENDEN..." 520 PRINT"DAVON ABGESEHEN IST DANK DEM LISTSCHUTZ" 530 PRINT"UND DER RUN/STOP-SPERRUNG SOWIESO KEIN" 540 PRINT"BESCHISS M[GLICH, HI, HI, HI!" 541 PRINT"UND JETZT DIE GUTE NACHRICHT: ICH HAB'" 542 PRINT"DICH VERARSCHT! WURSCHTEL NUR IM LIS-" 543 PRINT"TING RUM... SELBER SCHULD!" 547 PRINT"[153]DAGEGEN MACHT DIE PA\WORTFUNKTION DAS" 548 PRINT"GAME SCHON FAST ZU LEICHT... DU BEKOM-" 549 PRINT"MST ABER NAT^RLICH NICHT SO OFT EINS!" 550 PRINT"[154]SO! JETZ WOLL'N WA MA ANFANG', EY! AUF" 560 PRINT"GEHT'S... VIEL FUN (=SPA\)!" 562 GETA$:IFA$=""THEN562 564 IFA$<>""THEN570 570 PRINT"#$%SSEUS OF TIGERCREW!" 580 GETA$:IFA$=""THEN580 590 IFA$<>""THEN600 600 PRINT"[147][156]DU BEFINDEST DICH AUF EINEM RUNDEN," 610 PRINT"SECHSECKIGEN MARKTPLATZ. DIR IST SEHR" 620 PRINT"NEGATIV WARM, ALSO ZIEHST DU DEINE DICK" 630 PRINT"GEF^TTERTE SOMMERJACKE AN UND VERDECK-" 640 PRINT"ST DEINE VISAGE MIT DER VOLLEN HAAR-" 650 PRINT"PRACHT DEINER GLATZE. WO WILLST DU NUN" 660 PRINT"HINGEHEN?" 670 PRINT"[158]M[GLICHKEITEN:" 680 PRINT"[153]1) DUSCHEN BEI MC DONALDS" 690 PRINT"2) ZU DEINER OMA KNALLTRAUD" 700 PRINT"3) ZU DEINEM OPA HINKFRIED" 720 PRINT"4) IN DEN N]CHSTEN DROGERIEMARKT" 730 PRINT"[154]DEINE QUAL DER WAHL?" 740 GETA$:IFA$=""THEN750 750 IFA$="1"THEN800 760 IFA$="2"THEN810 770 IFA$="3"THEN820 780 IFA$="4"THEN830 790 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN740 800 PRINT"DIE LASSEN DICH DA NICHT REIN, SO DREK-" 802 PRINT"KIG WIE DU BIST, DU SCHWEINCHEN!":FORX=1TO3000:NEXTX:GOTO600 810 PRINT"DU SCHULDEST IHR NOCH -20 MARK...":FORX=1TO2000:NEXTX:GOTO600 820 PRINT"DER IS DOCH IM 0. WELTKRIEG GEFALLEN..." 822 PRINT"UND HAT SICH DAS LEBEN GEBROCHEN!":FORX=1TO3000:NEXTX:GOTO600 830 PRINT"JA, KAUF DIR KLOPAPIER UND HAARSHAMPOO!":FORX=1TO2000:NEXTX:GOTO840 840 PRINT"[147][156]DU BIST ALSO IN EINEM KLEINEN DROGERIE-" 850 PRINT"MARKT, DESSEN ENDE DU KAUM AUSMACHEN" 860 PRINT"KANNST. AN DER KASSE STEHT EINE JUNGE" 870 PRINT"FRAU, DIE SO UM DIE 60 SEIN K[NNTE." 880 PRINT"SIE GRINST DICH UNFREUNDLICH UND FRA-" 890 PRINT"GEND MIT UNINTERESSIERTEM BLICK AN..." 900 PRINT"[158]M[GLICHKEITEN:" 910 PRINT"[153]1) KLOPAPIER UND HAARSHAMPOO KAUFEN" 920 PRINT"2) IHR EINS AUFFE FRESSE HAUEN, NUR SO" 930 PRINT"3) SIE NACH DEM HEIMWEG FRAGEN" 940 PRINT"4) EINEN FAHREN LASSEN" 950 PRINT"[154]DEINE QUAL DER WAHL?" 960 GETA$:IFA$=""THEN960 970 IFA$="1"THEN1020 980 IFA$="2"THEN1030 990 IFA$="3"THEN1040 1000 IFA$="4"THEN1050 1010 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN960 1020 PRINT"DU NIMMST AUCH ALLES ERNST, PENNER...":FORX=1TO2000:NEXTX:GOTO840 1030 PRINT"MAN SCHL]GT KEINE DROGERIE-BESITZERIN!":FORX=1TO2000:NEXTX:GOTO840 1040 PRINT"SIE SAGT, SIE SEI TAUBSTUMM UND SCHICKT" 1042 PRINT"DICH WIEDER RAUS.":FORX=1TO3000:NEXTX:GOTO1060 1050 C$="635240":PRINT"[147][159]GRADE IN DEM MOMENT, IN DEM DU DEINE" 1052 PRINT"GASE ABLASSEN TUST, Z^NDET SIE EIN" 1054 PRINT"STREICHOLZ AN. DU WIRST IN EINER RIESI-" 1055 PRINT"GEN NUKLEAREN EXPLOSION IN KLEINE ATOME" 1056 PRINT"AUFGESPALTEN, DIE SICH MIT EINER IONEN-" 1057 PRINT"BINDUNG 'N EDELGASZUSTAND HOLEN WOLLEN," 1058 PRINT"UND BIST NUN NICHT MEHR SEHR LEBENDIG!":GOTO40000 1060 PRINT"[147][156]DIE IS DOCH WOHL TOTAL GENIAL...! DA" 1070 PRINT"WILL MAN NUR MAL NACH DEM WEG FRAGEN," 1080 PRINT"UND DIESE TAUBSTUMME KUH SCHREIT EINEN" 1090 PRINT"GLEICH AN UND SCHMEI\T EINEN AUF DIE" 1100 PRINT"STRA\E, DIE SO STAUBTROCKEN IS, DA\" 1110 PRINT"MAN GLEICH AUSRUTSCHT! WAS NUN, SCHMER-" 1120 PRINT"ZLOCK QUALMES?" 1130 PRINT"[158]M[GLICHKEITEN:" 1140 PRINT"[153]1) IN DEN TABAKLADEN GEHEN" 1150 PRINT"2) DEINE SANDALEN POLIEREN" 1160 PRINT"3) A BAYERISCH'S LIAD'L SINGA" 1170 PRINT"4) R^LPSEN" 1172 PRINT"[154]DEINE QUAL DER WAHL?" 1180 GETA$:IFA$=""THEN1180 1190 IFA$="1"THEN1240 1200 IFA$="2"THEN1250 1210 IFA$="3"THEN1260 1220 IFA$="4"THEN1270 1230 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN1180 1240 PRINT"DU BIST ZWAR NICHTRAUCHER UND RAUCHST" 1242 PRINT"NUR BAYERISCHE MARKEN, ABER WARUM SOLL-" 1244 PRINT"TEST DU NICH MAL REINSCHAUEN...":FORX=1TO4000:NEXTX:GOTO1280 1250 PRINT"DU HAST KEINE POLITUR!":FORX=1TO2000:NEXTX:GOTO1060 1260 PRINT"JODELDIH^DELDADOHUBASINGADODLDALIADL!":FORX=1TO2000:NEXTX:GOTO1060 1270 PRINT"DU R^LPST SO LAUT, DA\ ES KEIN MENSCH" 1272 PRINT"H[RT. DAF^R HAST DU NUN BAUCHWEH!":FORX=1TO3000:NEXTX:GOTO1060 1280 PRINT"[147][156]DU STEHST ALSO IM TABAKLADEN, IN DEM ES" 1290 PRINT"NUR APFELSAFT UND COLA GIBT. DER BESIT-" 1300 PRINT"ZER GLOTZT DICH UNFREUNDLICH UND WARM-" 1310 PRINT"HERZIG AN. 'WAS DARF'S DENN SEIN?'," 1320 PRINT"FRAGT ER DICH STUMM..." 1330 PRINT"[158]M[GLICHKEITEN:" 1340 PRINT"[153]1) DEMOLITION MAN SPIELEN" 1350 PRINT"2) IHN NACH DEM WEG NACH BAYERN FRAGEN" 1360 PRINT"3) EINE FLASCHE APFELSAFT SAUFEN" 1370 PRINT"4) IN DER NASE BOHREN UND GRUNZEN" 1380 PRINT"[154]DEINE QUAL DER WAHL?" 1390 GETA$:IFA$=""THEN1390 1400 IFA$="1"THEN1450 1410 IFA$="2"THEN1460 1420 IFA$="3"THEN1470 1430 IFA$="4"THEN1480 1440 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN1390 1450 C$="790158":PRINT"[147][159]SCHEI\E! IN EINER DER APFELSAFTFLA-" 1452 PRINT"SCHEN, DIE DU ZERST[RT HAST, WAR NITRO-" 1453 PRINT"GLYCERIN! DA DRAUF STAND 'EXTRA STARK" 1454 PRINT"AUS HEIMISCHEN ]PFELN', MANN! DU SOLL-" 1455 PRINT"TEST DIESE ]PFEL NICHT UNTERSCH]TZEN!" 1456 PRINT"NA JA, DAS KANNST DU JETZT EH NICHT" 1457 PRINT"MEHR, DENN DU BIST IN DIE EWIGEN KN[-" 1458 PRINT"DELGR^NDE EINGETRETEN...":GOTO40000 1460 PRINT"DU KANNST MIT DEM ZUG SCHON DORTHIN" 1462 PRINT"GELANGEN - DIE DINGER FAHREN ALLE" 1464 PRINT"4.63526374 STUNDEN VOM BAHNHOF AB. ALL-" 1465 PRINT"ERDINGS MU\T DU MIT MEHREREN Z^GEN FAH-" 1466 PRINT"REN, QUER DURCH IRRLAND...":FORX=1TO5000:NEXTX:GOTO1520 1470 PRINT"NEIN, TRINK DIESEN APFELSAFT BLO\ NICH," 1471 PRINT"NUR BAYERISCHER APFELSAFT IS RICHTIG" 1472 PRINT"GUT GIFTIG!":FORX=1TO4000:NEXTX:GOTO1280 1480 PRINT"DU BOHRST SO TIEF IN DEINER NASE, DA\" 1490 PRINT"DU SCHON DAS VAKUUM IN DEINEM GENIALEN" 1500 PRINT"GEHIRN F^HLEN KANNST. ES NIMMT DEN GE-" 1510 PRINT"SAMTEN RAUM IN DEINEM KOPF EIN!":FORX=1TO4000:NEXTX:GOTO1280 1520 PRINT"[147][156]DEM RAT DES TABAKH]NDLERS FOLGEND SPA-" 1530 PRINT"ZIERST DU SCHNURSTRACKS MIT DER GE-" 1540 PRINT"SCHWINDIGKEIT EINER SCHNECKE GEN BAHN-" 1550 PRINT"HOF, DEN DU NACH 6-ST^NDIGER SUCHE GAR" 1560 PRINT"NICHT VERFEHLEN KANNST. VON DORT FAHREN" 1570 PRINT"Z^GE IN ALLE 4.736 HIMMELSRICHTUNGEN," 1580 PRINT"AUSGENOMMEN OBEN (?) UND UNTEN..." 1581 PRINT"[158]M[GLICHKEITEN:" 1582 PRINT"[153]1) ZUG NACH NORDEN NEHMEN" 1583 PRINT"2) ZUG NACH OSTEN NEHMEN" 1584 PRINT"3) ZUG NACH S^DEN NEHMEN" 1585 PRINT"4) ZUG NACH WESTEN NEHMEN" 1586 PRINT"[154]DEINE QUAL DER WAHL?" 1587 GETA$:IFA$=""THEN1587 1588 IFA$="1"THEN1600 1589 IFA$="2"THEN1700 1590 IFA$="3"THEN1800 1591 IFA$="4"THEN1900 1592 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN1587 1600 C$="KEINS!":PRINT"[147][159]DU STEIGST IN DEN ZUG. NACH EINIGEN MI-" 1602 PRINT"NUTEN H[RST DU PL[TZLICH PFERDEHUFE" 1604 PRINT"NEBEN DER LOK. ALS DU AUS DEM FENSTER" 1606 PRINT"GLOTZT, SIEHST DU MILLIARDEN VON INDI-" 1608 PRINT"ANERN, DIE DEN ZUG MIT IHREN COMPUTER-" 1610 PRINT"GESTEUERTEN PFERDEN VERFOLGEN. PL[TZ-" 1620 PRINT"LICH SP^RST DU EINEN STICH INS HERZ" 1622 PRINT"UND F]LLST TOT UM." 1624 PRINT"DU BIST IN DEN VERGN^GUNGSZUG VON" 1626 PRINT"DISNEYLAND GESTIEGEN, DER DURCH COMPU-" 1627 PRINT"TERGESTEUERTE LANDSCHAFTEN F]HRT. DER" 1628 PRINT"STICH IN DEINEM HERZ WAR DEIN HERZ-" 1629 PRINT"SCHRITTMACHER, DA DU WIEDERMAL KEINE" 1630 PRINT"SPARTA-BATTERIEN BENUTZT HAST!":GOTO40000 1700 PRINT"DU HAST DEN RICHTIGEN ZUG GEW]HLT, EY!" 1710 PRINT"ER BRINGT DICH WEITER NACH OSTEN, WO DU" 1720 PRINT"RASEND SCHNELL AUS DEM ZUG SCHLEICHST.":FORX=1TO4000:NEXTX:GOTO3000 1800 C$="KEINS!":PRINT"[147][159]DU SITZT NUN IM ZUG NACH S^DEN. NACH" 1810 PRINT"4 JAHREN FRAGST DU DICH LANGSAM, WANN" 1812 PRINT"DAS DING ENDLICH LOSF]HRT. NACH WEI-" 1813 PRINT"TEREN 9 JAHREN FINDET MAN DICH, DIE" 1814 PRINT"FINGER NOCH IN D]UMCHENDREH-POSITION," 1816 PRINT"IN DEM ZUG, DER SCHON SEIT 80 JAHREN" 1817 PRINT"AUF DIESEM ABSTELLGLEIS STEHT...":GOTO40000 1900 C$="KEINS!":PRINT"[147][159]SO, SO, DU WILLST NACH WESTEN... DU" 1910 PRINT"STEIGST IN DEN ZUG EIN. NACH CA. 3 STD." 1920 PRINT"F]HRT ER AB. PL[TZLICH GEHT EIN RUCK" 1930 PRINT"DURCH DEN WAGGON, IN DEM KOMISCHERWEISE" 1940 PRINT"NUR DU SITZT. DANN WIRD ES DUNKEL," 1950 PRINT"SCHLIE\LICH AUCH WIEDER HELL. DU TRAU-" 1960 PRINT"ST DEINEN AUGEN NICHT: VOR DIR STEHT" 1970 PRINT"ROTK]PPCHEN! SIE SAGT, SIE WOLLE IHRER" 1980 PRINT"OMA ASPIRIN BRINGEN, WEIL DIE WIEDER ZU" 1990 PRINT"VIEL GEGLOTZT HAT. BL[D WIE DU BIST," 2000 PRINT"GEHST DU MIT UND WIRST VOM B[SEN WOLF" 2010 PRINT"GEK^\T, WORAUF DU DICH IN EINE KUGEL" 2020 PRINT"VERWANDELST, DIE DIE PRINZESSIN VOM" 2030 PRINT"FROSCHK[NIG F^R IMMER IM BRUNNEN VER-" 2040 PRINT"SCHWINDEN L]\T...":GOTO40000 3000 PRINT"[147][156]JETZT STEHST DU ALSO SITZEND AUF DEM" 3010 PRINT"OST-BAHNHOF. WEIL DER N]CHSTE ZUG ERST" 3020 PRINT"IN 25.74638 STD. KOMMT, BESCHLIE\T DU" 3030 PRINT"GEGEN DEINEN WILLEN, IN DIE STADT ZU" 3040 PRINT"GEHEN. DORT BIST DU NUN AUCH. DU SIEHST" 3050 PRINT"HIER VIELE LEUTE, AUCH K^NSTLER UND" 3060 PRINT"FLAMMENWERFER - ]H - FEUERSCHLUCKER..." 3070 PRINT"[158]M[GLICHKEITEN:" 3080 PRINT"[153]1) FEUER SCHLUCKEN" 3090 PRINT"2) K^NSTLER BEQUATSCHEN" 4000 PRINT"3) IM RAT HAUS[153]EN" 4010 PRINT"4) NUR BL[D RUMSTEHEN UND GLOTZEN" 4020 PRINT"[154]DEINE QUAL DER WAHL?" 4030 GETA$:IFA$=""THEN4030 4040 IFA$="1"THEN4090 4050 IFA$="2"THEN5000 4060 IFA$="3"THEN5010 4070 IFA$="4"THEN5020 4080 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN4030 4090 C$="KEINS!":PRINT"[147][159]BEI DEINEM TOTAL BESCHEUERTEN VERSUCH," 4100 PRINT"DAS FEUER ZU SCHLUCKEN, F]LLT DIR DER" 4110 PRINT"BRENNENDE AST AUF DEINE NEUE LEDERHOS'N" 4120 PRINT"UND BRENNT EIN NIEDLICHES LOCH MIT 5 M" 4130 PRINT"DURCHMESSER REIN. DU WIRST SO W^TEND," 4140 PRINT"DA\ LEIDER DEIN HERZSCHRITTMACHER VON" 4150 PRINT"SCHROTT U. SOHN AG DEN GEIST AUFGIBT," 4160 PRINT"UND DAMIT AUCH DU!":GOTO40000 5000 PRINT"DER K^NSTLER SAGT DIR, DU SOLLST DEN " 5001 PRINT"N]CHSTEN ZUG NACH NORDEN NEHMEN, UM" 5002 PRINT"DEINEM ZIEL N]HER ZU KOMMEN.":FORX=1TO4000:NEXTX:GOTO6000 5010 PRINT"WAS? DU WILLST MIT DEM RAD BRAUSEN????":FORX=1TO2000:NEXTX:GOTO3000 5020 PRINT"IS DAS NICH 'N BI\CHEN LANGWEILIG...?":FORX=1TO2000:NEXTX:GOTO3000 6000 PRINT"[147][156]DA DU JA IMMER GERNE DEN TIPS ANDERER" 6010 PRINT"LEUTE FOLGE LEISTEST, GEHST DU NICHT" 6020 PRINT"DIREKT ZUM BAHNHOF, SONDERN NIMMST EINE" 6030 PRINT"KLEINE ABK^RZUNG VON WENIGER WENN NICHT" 6040 PRINT"MEHR ALS VIEL KILOMETERN (ODER SO...)." 6055 PRINT"SCHON BIST DU AM BAHNHOF. DER N]CHSTE" 6056 PRINT"ZUG KOMMT WENN ^BERHAUPT ERST AB PFING-" 6060 PRINT"STEN, WAS WILLST DU ALSO IN DER ZWISCH-" 6070 PRINT"ENZEIT UNGERNE MACHEN?" 6080 PRINT"[158]M[GLICHKEITEN:" 6090 PRINT"[153]1) AUF'S KLO GEHEN" 6100 PRINT"2) AUF DIE GLEISE PINKELN" 6110 PRINT"3) EINFACH NUR WARTEN" 6120 PRINT"4) DICH AUF DIE GLEISE LEGEN UND PENNEN" 6130 PRINT"[154]DEINE QUAL DER WAHL?" 6140 GETA$:IFA$=""THEN6140 6150 IFA$="1"THEN6200 6160 IFA$="2"THEN6210 6170 IFA$="3"THEN6300 6180 IFA$="4"THEN6400 6190 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN6140 6200 PRINT"DIE STINKEN DOCH IMMER SO! VERKNEIF'S" 6202 PRINT"DIR HALT NOCH BIS BAYERN...":FORX=1TO3000:NEXTX:GOTO6000 6210 C$="KEINS!":PRINT"[147][159]W]HREND DU GEM^TLICH AUF DIE GLEISE" 6220 PRINT"PINKELST, SIEHST DU EIN ROTES SCHILD..." 6230 PRINT"'NICHT AUF DIE GLEISE PINKELN! 1000000" 6240 PRINT"VOLT HOCHSPANNUNG!' TJA, NUR LEIDER IS" 6250 PRINT"ES F^R DICH SCHON ETWAS ZU SP]T! WENN" 6260 PRINT"DU'S VORHER GELESEN H]TTEST, W^RDEST" 6270 PRINT"DU JETZT NOCH LEBEN! ABER SO....":GOTO40000 6300 PRINT"NACH 25 TAGEN SIEHST DU IN DER FERNE " 6310 PRINT"DEN ZUG KOMMEN UND MACHST DICH BEREIT.":FORX=1TO3000:NEXTX:GOTO7000 6400 PRINT"GAAAAAAANZ RUHIG, MEIN LIEBER... GLEICH" 6410 PRINT"KOMMEN DIE M]NNER MIT DEN WEI\EN TURN-" 6420 PRINT"SCHUHEN! BERUUUUUUHIGE DICH...":FORX=1TO4000:NEXTX:GOTO6000 7000 PRINT"[147][156]MIT OHRENBET]UBENDEM L]RM ROLLT DER" 7010 PRINT"ZUG LANGSAM UND FAST GER]USCHLOS AUF" 7020 PRINT"DEN BAHNHOF ZU. DA ER AUS RASENDER" 7030 PRINT"FAHRT BREMSEN MU\, KOMMT ER ERST MIT" 7040 PRINT"DEM LETZTEN WAGGON VOR DEINER NASE AN." 7050 PRINT"DU SPRINGST LANGSAM IN DEN WAGGON UND" 7060 PRINT"WARTEST AUF DIE ABFAHRT. NACH 0.0 SEK." 7070 PRINT"F]HRT DER ZUG LOS. DIE FAHRT DAUERT" 7080 PRINT"WAHRSCHEINLICH NUR 3 TAGE BIS ZUM N]-" 7090 PRINT"CHSTEN BAHNHOF. WAS WILLST DU MACHEN?" 7100 PRINT"[158]M[GLICHKEITEN:" 7110 PRINT"[153]1) JETZT ENDLICH AUF'S KLO GEHEN" 7120 PRINT"2) DURCH DEN ZUG KRIECHEN" 7130 PRINT"3) SCHLAFEN" 7140 PRINT"4) ZEITUNG H[REN" 7142 PRINT"[154]DEINE QUAL DER WAHL?" 7150 GETA$:IFA$=""THEN7150 7160 IFA$="1"THEN7210 7170 IFA$="2"THEN7300 7180 IFA$="3"THEN7310 7190 IFA$="4"THEN7320 7200 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN7150 7210 C$="507918":PRINT"[147][159]DU SPRINGST SO LANGSAM VON DEINER BANK" 7220 PRINT"AUF, DA\ DU FAST AUS DEM GESCHLOSSENEN" 7230 PRINT"FENSTER F]LLST. DANN GEHST DU IN RICH-" 7240 PRINT"TUNG WAGGONT^R, UM ZUM KLO ZU GELANGEN." 7250 PRINT"DU [FFNEST SIE, TRITTST HINDURCH, UND" 7260 PRINT"LANDEST... AUF DEN GLEISEN, DU VERDAM-" 7270 PRINT"MTER IDIOT! DU BIST DURCH DIE FALSCHE" 7280 PRINT"T^R GELATSCHT, MANN! SCHON VERGESSEN," 7290 PRINT"DA\ DU IM LETZTEN WAGGON WARST?":GOTO40000 7300 PRINT"ACH, BLEIB LIEBER HOCKEN, DU K[NNTEST" 7302 PRINT"DIR JA DEN KLEINEN ZEH ANHAUEN...":FORX=1TO2000:NEXTX:GOTO7000 7310 PRINT"DU LEGST DICH SCHLAFEN, ALS DU WIEDER" 7312 PRINT"AUFWACHST, STEHT DER ZUG SCHON AM BAHN-" 7314 PRINT"HOF UND DU STEIGST AUS DEM FENSTER AUS.":FORX=1TO3000:NEXTX:GOTO8000 7320 PRINT"SEIT WANN KANN MAN ZEITUNG H[REN????" 7330 PRINT"BIST DU JETZT TOTAL IRR, ODER WAS? GUT!":FORX=1TO2000:NEXTX:GOTO7000 8000 PRINT"[147][156]NUN STEHST DU SCHON WIEDER AUF 'NEM" 8010 PRINT"BAHNHOF! WIRD LANGSAM LANGWEILIG... VON" 8020 PRINT"HIER AUS KANNST DU IN EINIGER ENTFER-" 8030 PRINT"NUNG EIN FRE\TAURANT SEHEN. DEIN MAGEN" 8040 PRINT"HAT SCHON LANGE KEINEN SCHWEINSBRATEN" 8050 PRINT"MIT KN[DELN MEHR GESEHEN..." 8060 PRINT"[158]M[GLICHKEITEN:" 8070 PRINT"[153]1) AUF DEN N]CHSTEN ZUG WARTEN" 8080 PRINT"2) EINEN BAHNBEAMTEN BELABERN" 8090 PRINT"3) DEINE RESTLICHE KOHLE Z]HLEN" 8091 PRINT"4) IN'S FRE\TAURANT GEHEN" 8092 PRINT"[154]DEINE QUAL DER WAHL?" 8093 GETA$:IFA$=""THEN8093 8094 IFA$="1"THEN8180 8095 IFA$="2"THEN8120 8096 IFA$="3"THEN8300 8097 IFA$="4"THEN8400 8098 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN8093 8100 PRINT"4) IN'S FRE\TAURANT GEHEN" 8110 PRINT"[129]DEINE QUAL DER WAHL?" 8120 C$="KEINS!":PRINT"[147][159]DU FINDEST EINEN BEAMTEN, DEN DU SO-" 8122 PRINT"GLEICH MIT BAYERISCHEN BAUERNWEISHEITEN" 8124 PRINT"VOLLABERST. KOMISCH, WARUM SCHAUT DER" 8126 PRINT"SO W^TEND? PL[TZLICH ZIEHT ER SEINE" 8128 PRINT"WASSERPISTOLE RAUS, RICHTET SIE AUF" 8130 PRINT"DICH... UND DR^CKT AB!" 8140 PRINT"LEIDER BEMERKTE MAN ERST SP]TER, DA\" 8150 PRINT"DU DEM BANKR]UBER, DER ^BERMORGEN DIE" 8152 PRINT"[RTLICHE BANK ^BERFALLEN HAT, NUR ]HN-" 8154 PRINT"LICH WARST, KEINESFALLS MIT IHM IDEN-" 8156 PRINT"TISCH! DU HAST ABER AUCH IMMER EIN" 8158 PRINT"PECH...":GOTO40000 8180 PRINT"WER WEI\, WANN DER KOMMT...":FORX=1TO2000:NEXTX:GOTO8000 8300 PRINT"DU Z]HLST 5 TAGE UND KOMMST AUF EINEN" 8310 PRINT"BETRAG VON 5423.8256253 DM. DAS REICHT" 8320 PRINT"LOCKER BIS NACH HAUSE! NA JA, DAF^R" 8330 PRINT"GEHT DAMIT DEINE URLAUBSKASSE DRAUF...":FORX=1TO4000:NEXTX:GOTO8000 8400 PRINT"GUT, DU FOLGST ALSO DEM BRUMMEN DEINES" 8410 PRINT"ARMEN MAGENS...":FORX=1TO3000:NEXTX:GOTO9000 9000 PRINT"[147][156]DU GEHST ALSO IN DIESES FRE\TAURANT." 9010 PRINT"ES SIEHT ZIEMLICH NOBEL AUS, DAVON AB-" 9020 PRINT"GESEHEN, DA\ DIE ST^HLE UND TISCHE" 9030 PRINT"NUR ROH ZUSAMMENGEZIMMERT, DIE W]NDE" 9040 PRINT"SCHIMMELBEDECKT UND DIE G]STE LAUTER" 9050 PRINT"ASSOZIALE GRATLER SIND. ALSO GENAU" 9060 PRINT"RICHTIG F^R DICH! DU SETZT DICH AUF" 9070 PRINT"EINEN TISCH, WUNDERST DICH, WARUM DER" 9080 PRINT"TISCH SO KLEIN IST, UND BL]TTERST DIE" 9090 PRINT"FETTBESCHMIERTE SPEISEKARTE DURCH:" 9100 PRINT"[158]M[GLICHKEITEN:" 9110 PRINT"[153]1) POMMES MIT PREISELBEEREN" 9120 PRINT"2) SCHWEINSBRATEN MIT JOGHURT (BIO)" 9130 PRINT"3) BEEFSTEAK MIT KAISERSCHMARRN" 9140 PRINT"4) GEMISCHTER SALAT MIT VANILLESAUCE" 9150 PRINT"[154]DEINE QUAL DER WAHL?" 9160 GETA$:IFA$=""THEN9160 9170 IFA$="1"THEN9220 9180 IFA$="2"THEN9230 9190 IFA$="3"THEN9240 9200 IFA$="4"THEN9250 9210 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN9160 9220 PRINT"IGITT! BIST DU BEH]MMERT, ODER WAS?":FORX=1TO2000:NEXTX:GOTO9000 9230 PRINT"JA, DAS SCHEINT MIR UNTER ANBETRACHT" 9232 PRINT"DER ANDEREN 'SPEISEN' NOCH DIE BESTE" 9234 PRINT"WAHL...":FORX=1TO3000:NEXTX:GOTO10000 9240 PRINT"WO IS DEIN GESCHMACK GEBLIEBEN? DAHEIM" 9242 PRINT"AUF DER ANRICHTE LIEGENGELASSEN????":FORX=1TO3000:NEXTX:GOTO9000 9250 C$="KEINS!":PRINT"[147][159]DER SCHMIERIGE KELLNER, DER IRGENDWIE" 9260 PRINT"]HNLICHKEIT MIT KATER KARLO HAT, KNALLT" 9270 PRINT"DIR EINE DRECKIGE SCH^SSEL MIT EIN PAAR" 9280 PRINT"VERWELKTEN SALATBL]TTERN UND EINEM MIE-" 9290 PRINT"FIGEN EI HIN. LEIDER BIST DU SO SAUBL[D" 9300 PRINT"UND TUST DIR DAS ZEUG AUCH NOCH EINVER-" 9310 PRINT"LEIBEN, ANSTATT ES DEM ATOMM^LL ZUZU-" 9320 PRINT"F^HREN!!!! DAS MU\T DU MIT EINER SAL-" 9330 PRINT"MONELLENVERGIFTUNG UND NEBENBEI AUCH" 9340 PRINT"MIT DEINEM LEBEN BEZAHLEN." 9350 PRINT"^BRIGENS FEHLTE DIE VANILLESAUCE...":GOTO40000 10000 PRINT"[147][156]IRGENDWIE HAST DU DIESES ZEUG RUNTERGE-" 10010 PRINT"W^RGT, DEM GIERIGEN KELLNER DEN HOR-" 10020 PRINT"RORPREIS VON 2.95 DM BEZAHLT UND DIESE" 10030 PRINT"DRECKBUDE VERLASSEN. ZUF]LLIGERWEISE" 10040 PRINT"STAND DER ZUG SCHON DA, DU STIEGST EIN," 10050 PRINT"UND GELANGTEST MIT DEM TEIL INNERHALB" 10060 PRINT"VON 2 WOCHEN AUF DEN LETZTEN BAHNHOF" 10070 PRINT"VOR BAYERN. NA JA, WAR JA AUCH 'N ICE." 10080 PRINT"DU GEHST ZUM KIOSK UND WILLST DIR WAS" 10090 PRINT"KAUFEN:" 10100 PRINT"[158]M[GLICHKEITEN:" 10110 PRINT"[153]1) 'N PORNOHEFT" 10120 PRINT"2) DIE NEUE BRAVO" 10130 PRINT"3) DIE NEUE LOKUS" 10140 PRINT"4) MICKY MAUS" 10150 PRINT"[154]DEINE QUAL DER WAHL?" 10160 GETA$:IFA$=""THEN10160 10170 IFA$="1"THEN10220 10180 IFA$="2"THEN10230 10190 IFA$="3"THEN10240 10200 IFA$="4"THEN10250 10210 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN10160 10220 PRINT"MANN, DA SIND JA GAR KEINE NACKTEN" 10222 PRINT"BAUERNMADELN DRIN! SO'N SCHUND, EY!":FORX=1TO3000:NEXTX:GOTO10000 10230 PRINT"DU BIST SO ENTSETZT ^BER DIESES BRU-" 10232 PRINT"TALE PORNOHEFT, DA\ DU ES UNZERRISSEN" 10234 PRINT"UND IN KLEINE TEILE ZERFETZT IN DEN" 10236 PRINT"M^LLEIMER WANDERN L]\T.":FORX=1TO4000:NEXTX:GOTO10000 10240 C$="904671":PRINT"[147][159]DU SCHL]GST DAS HEFT AUF UND STECKST" 10242 PRINT"SOFORT IN EINEM BERICHT ^BER ITALIE-" 10244 PRINT"NISCHE K^NSTLER UND IHRE WERKE. DOCH" 10246 PRINT"PL[TZLICH F]LLST DU WIE VOM BLITZ GE-" 10248 PRINT"TROFFEN UM! DIAGNOSE: KULTURSCHOCK...":GOTO40000 10250 PRINT"WIE ALT BIST DU JETZT, IGNAZILEIN...":FORX=1TO2000:NEXTX:GOTO11000 11000 PRINT"[147][156]NA JA, WAS SOLL'S? DU KAUFST DIR 'NE" 11010 PRINT"MICKY MAUS UND VERZIEHST DICH DAMIT WI-" 11020 PRINT"EDER AUF DEN BAHNHOF. ALS DU GERADE AN" 11030 PRINT"DER STELLE BIST, WO ONKEL DAGOBERT SEI-" 11040 PRINT"NEN NEFFEN DONALD MIT EINER ATOMBOMBE" 11050 PRINT"IN DER HAND VERFOLGT, H[RST DU DEINEN" 11060 PRINT"LETZTEN ZUG KOMMEN. NA ENDLICH! DU" 11070 PRINT"STEIGST GLEICH NACH 5 MIN. EIN UND BIST" 11080 PRINT"IN EINEM LEEREN ABTEIL, DAS SO ^BERF^L-" 11090 PRINT"LT IST, DA\ DU NUR STEHEN KANNST..." 11100 PRINT"[158]M[GLICHKEITEN:" 11110 PRINT"[153]1) EINE ALTE OMA VOM PLATZ QUETSCHEN" 11120 PRINT"2) STEHEN, STEHEN, STEHEN..." 11130 PRINT"3) DICH AUF DIE GEP]CKABLAGE LEGEN" 11140 PRINT"4) LAUT SCHREIEN" 11150 PRINT"[154]DEINE QUAL DER WAHL?" 11160 GETA$:IFA$=""THEN11160 11170 IFA$="1"THEN11220 11180 IFA$="2"THEN11320 11190 IFA$="3"THEN11330 11200 IFA$="4"THEN11340 11210 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN11160 11220 C$="KEINS!":PRINT"[147][159]DU SETZT DICH LANGSAM IN BEWEGUNG, IN" 11230 PRINT"DER ABSICHT, DIE ARME OMA MIT DEINEM" 11240 PRINT"BIERBAUCH ZU VERSCHEUCHEN. DU BIST FAST" 11250 PRINT"GANZ BEI IHR, ALS SIE SICH PL[TZLICH" 11260 PRINT"IN HEINO VERWANDELT! DU STARRST DIESE" 11270 PRINT"AUSGEBURT DER H[LLE ENTSETZT AN, DEI-" 11280 PRINT"NE HERZSCHRITTMACHER-BATTERIEN GEBEN" 11282 PRINT"DEN GEIST AUF, UND DU STEHST VOR DEM" 11284 PRINT"HIMMELSTOR...":GOTO40000 11320 PRINT"BIST DU BL[D? DIE FAHRT DAUERT 9 STD.!" 11322 FORX=1TO2000:NEXTX:GOTO11000 11330 PRINT"GUTE IDEE! GUT GELAUNT WACHST DU AUF..." 11332 FORX=1TO2000:NEXTX:GOTO12000 11340 PRINT"DIE LEUTE IM WAGGON KLATSCHEN LAUT BEI-" 11350 PRINT"FALL, DA SIE DICH F^R DEN S]NGER VON" 11360 PRINT"AC/DC HALTEN!":FORX=1TO3000:NEXTX:GOTO11000 12000 PRINT"[147][156]UND MERKST, DA\ DER ZUG AUF DEM M^N-" 12010 PRINT"CHENER HAUPTBAHNHOF STEHT! VOR FREUDE" 12020 PRINT"VERL]\T DU DEN ZUG AUS VERSEHEN DURCH" 12030 PRINT"DIE T^R UND ATMEST TIEF DIE EKLIGE" 12040 PRINT"BAYERISCHE LUFT EIN. ENDLICH DAHEIM!" 12050 PRINT"NA JA, NICHT GANZ... DU WOHNST JA NICHT" 12060 PRINT"IN M^NCHEN, SONDERN IN HINTERFURZING." 12070 PRINT"UND BIS DAHIN SIND'S NOCH 20 KM MIT DEM" 12080 PRINT"TAXI. DU GEHST ZUM TAXISTAND..." 12090 PRINT"[158]M[GLICHKEITEN:" 12100 PRINT"[153]1) GLEICH DAS ERSTE TAXI NEHMEN" 12110 PRINT"2) LIEBER AUF'S N]CHSTE WARTEN" 12120 PRINT"3) DEINE MICKY MAUS VERKAUFEN" 12130 PRINT"4) WEITERLESEN" 12140 PRINT"[154]DEINE QUAL DER WAHL?" 12150 GETA$:IFA$=""THEN12150 12160 IFA$="1"THEN12210 12170 IFA$="2"THEN12300 12180 IFA$="3"THEN12310 12190 IFA$="4"THEN12320 12200 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN12150 12210 C$="KEINS!":PRINT"[147][159]DU STEIGST INS TAXI EIN. DER FAHRER" 12212 PRINT"HAT 'NEN HELM AUF DER BIRNE UND FREUT" 12214 PRINT"SICH KOMISCHERWEISE IRRSINNIG ^BER" 12216 PRINT"DEINEN BESUCH. BEVOR DU DICH NOCH" 12218 PRINT"LANGE WUNDERN KANNST, GIBT DER IRRE" 12220 PRINT"PL[TZLICH VOLLGAS UND RAUSCHT MIT MIN-" 12222 PRINT"DESTENS 60000 SACHEN DAVON. DOCH DANN" 12224 PRINT"STEHT PL[TZLICH EIN ATOM IM WEG, DAS" 12226 PRINT"SICH STUR WEIGERT, AUS DEM WEG ZU GE-" 12228 PRINT"HEN! DEIN FAHRER FLUCHT NOCH KURZ, BE-" 12230 PRINT"T]TIGT DEN SCHLEUDERSITZ UND FLIEGT DA-" 12240 PRINT"VON. DU MU\T NUN LEIDER N]HERE BEKANNT-" 12242 PRINT"SCHAFT MIT DEM ATOM MACHEN..." 12244 PRINT"DU SOLLTEST SCHILDER MEHR BEACHTEN..." 12248 PRINT"AM TAXISTAND TAT N]MLICH EINS SEIN! DA" 12250 PRINT"STAND 'BEIFAHRER ZUR STADTRALLEYE GE-" 12260 PRINT"SUCHT!' DRAUF..." 12261 GETA$:IFA$=""THEN12261 12262 IFA$<>""THEN40000 12300 PRINT"DU WARTEST AUF'S N]CHSTE TAXI. DAS KOM-" 12302 PRINT"MT AUCH SCHON NACH 2 JAHREN UND BRINGT" 12304 PRINT"DICH GERADEWEGS NACH HINTERFURZING!" 12305 PRINT"KOSTET NUR 1928.73 DM. BILLIG!" 12307 FORX=1TO4000:NEXTX:GOTO13000 12310 PRINT"WILLST DU ZUM MASSENM[RDER WERDEN????" 12311 PRINT"DIE LACHEN SICH DOCH ALLE TOT...":FORX=1TO3000:NEXTX:GOTO12000 12320 PRINT"JETZT NICHT, IGNAZIUS!" 12322 FORX=1TO3000:NEXTX:GOTO12000 13000 PRINT"[147][156]WAAAAAAAAAHNSINN! DU BIST IN DEINEM GE-" 13010 PRINT"LIEBTEN DORF HINTERFURZING, MANN! NUN" 13020 PRINT"KANNST DU WIEDER DIE LECKERE ODELLUFT" 13030 PRINT"RIECHEN, DIE H^HNER ERSCHRECKEN, H^B-" 13040 PRINT"SCHEN ZENZI'S NACHPFEIFEN, USW.! MANN," 13050 PRINT"JETZT GEH ABER GLEICH NACH HAUSE..." 13060 PRINT"DU WILLST DOCH GLEICH NACH HAUSE?" 13070 PRINT"[158]M[GLICHKEITEN:" 13080 PRINT"[153]1) ERSTMAL IN DEINE STAMMKNEIPE" 13090 PRINT"2) GLEICH NACH HAUSE JUMPEN" 13100 PRINT"3) IM N]CHSTEN MISTHAUFEN BADEN" 13110 PRINT"4) DICH EINFACH FREUEN" 13111 PRINT"[154]DEINE QUAL DER WAHL?" 13120 GETA$:IFA$=""THEN13120 13130 IFA$="1"THEN13180 13140 IFA$="2"THEN13300 13150 IFA$="3"THEN13320 13160 IFA$="4"THEN13330 13170 IFA$<>"1"ANDA$<>"2"ANDA$<>"3"ANDA$<>"4"THEN13120 13180 PRINT"TJA, DU BIST EBEN EIN RICHTIGER BAYER!" 13182 PRINT"DU SCHLEICHST MIT AFFENARTIGER GESCHWI-" 13184 PRINT"NDIGKEIT IN DEINE STAMMKNEIPE UND FEIE-" 13185 PRINT"RST...":FORX=1TO4000:NEXTX:GOTO50000 13300 C$="123329":PRINT"[147][159]DU MACHST DICH ALSO AUF DEN HEIMWEG." 13302 PRINT"PL[TZLICH SIEHST DU AUF DEM BODEN EI-" 13303 PRINT"NEN IMMER GR[\ER WERDENDEN SCHATTEN!" 13304 PRINT"DU SIEHST NACH OBEN... ACH, NUR EINE" 13305 PRINT"ATOMBOMBE! EINE ATOMBOMBE???? WARUM" 13306 PRINT"MU\T IMMER GRADE DU SO EIN PECH HABEN?" 13307 PRINT"AB JETZT MUSST DU ALS NUKLEARMAN DIE" 13308 PRINT"WELT BESCH^TZEN UND WIRST EINES TAGES" 13309 PRINT"VON DEINEM ERZFEIND MAHN-MAN UM DIE" 13310 PRINT"ECKE GEBRACHT. TJA, EIN ECHTER BAYER" 13311 PRINT"GEHT AUCH NICH GLEICH NACH HAUSE...":GOTO40000 13320 PRINT"WAS WIRD DEINE NICHT VORHANDENE FRAU" 13322 PRINT"DAZU SAGEN????":FORX=1TO2000:NEXTX:GOTO13000 13330 PRINT"GUT, DU FREUST DICH ERSTMAL 5 JAHRE!":FORX=1TO2000:NEXTX:GOTO13000 30000 B$="0":PRINT"PA\WORTABFRAGE:" 30001 PRINT"[159]'CREDITS' F^R SELBIGE." 30004 INPUT"PW ODER RETURN F^R ANFANG ";B$ 30005 IFB$="0"THEN50 30010 D$="635240":E$="790158":H$="507918":I$="904671":J$="123329":K$="CREDITS" 30020 IFB$=D$THEN840 30030 IFB$=E$THEN1280 30040 IFB$="KEINS!"THEN32000 30070 IFB$=H$THEN7000 30080 IFB$=I$THEN10000 30090 IFB$=J$THEN13000 30095 IFB$=K$THEN50750 31000 IFB$<>"0"ANDB$<>D$ANDB$<>E$ANDB$<>H$ANDB$<>I$ANDB$<>J$ANDB$<>K$THEN33000 32000 PRINT"[147][154]MANN, BIST DU BL[D! WENN HINTER DEM" 32010 PRINT"WORT 'PA\WORT = ' DAS WORT 'KEINS!'" 32020 PRINT"STEHT, HEI\T DAS, DA\ DU HIER KEINS BE-" 32030 PRINT"KOMMST! KAPIERT? SONST W]R'S JA WOHL ZU" 32040 PRINT"LEICHT..." 32050 GETA$:IFA$=""THEN32050 32060 IFA$<>""THEN50 33000 PRINT"[147][159]NICHT AKZEPTIERT..." 33010 FORX=1TO2000:NEXTX:GOTO30 40000 PRINT"ES TUT MIR ECHT LEID, DA\ ES MICH SO" 40010 PRINT"FREUT, DA\ DU SO NEGATIV GUT WARST, DA\" 40020 PRINT"DU ERST JETZT SCHON SO GANZ UND GAR UN-" 40030 PRINT"LEBENDIG DASTEHST...!" 40040 PRINT"#$%SSEUS OF TIGERCREW! [158]PA\WORT = ";C$ 40050 GETA$:IFA$=""THEN40055 40055 PRINT"NOCHMAL ODER ENDE ?" 40056 GETA$:IFA$=""THEN40056 40057 IFA$="N"THEN30 40058 IFA$="E"THENSYS64738 40059 IFA$<>"N"ANDA$<>"E"THEN40056 40060 IFA$<>""THENEND 50000 PRINT"[147][156]ERSTMAL MIT DEINEN KUMPELS DEINE R^K-" 50010 PRINT"KEHR NACH 7 JAHREN. JA, SO LANGE WARST" 50020 PRINT"DU WECH! IHR SITZT BIS MITTERNACHT DA" 50030 PRINT"UND DU S]UFST EINE MASS NACH DER ANDE-" 50040 PRINT"REN. UM 11 SCHWANKST DU DANN ENDLICH" 50050 PRINT"NACH HAUSE UND LEGST DICH DORT GLEICH" 50060 PRINT"INS BETT. AM N]CHSTEN MORGEN WIRST DU" 50070 PRINT"VON DEINEM WECKER GEWECKT, ABER DU" 50080 PRINT"WARST SOWIESO SCHON AUF. VERWUNDERT" 50090 PRINT"REIBST DU DIR DIE AUGEN. DU SIEHST AUF" 50100 PRINT"DEINE ARMBANDUHR: 12.02.95! ABER DU" 50110 PRINT"WARST DOCH 7 JAHRE WEG! ALSO M^\TE" 50120 PRINT"JETZT DAS JAHR 2002 SEIN! ABER DEINE" 50130 PRINT"UHR GEHT GANZ NORMAL...DA F]LLT ES DIR" 50140 PRINT"WIE SCHUPPEN VON DEN HAAREN:ALLES WAR" 50150 PRINT"NUR EIN TRAUM! SOWAS IRRES! DU GEHST" 50160 PRINT"G]HNEND RICHTUNG BAD, UND BLEIBST WIE" 50170 PRINT"ANGEWURZELT STEHEN, ALS DEIN M^DER" 50180 PRINT"BLICK AUF DIE MICKY MAUS F]LLT, DIE DA" 50181 GETA$:IFA$=""THEN50181 50182 IFA$<>""THEN50190 50190 PRINT"AUF DEM BODEN LIEGT... SOWAS KAUFST DU" 50200 PRINT"DOCH NIE... VERDAMMT! DIE IS JA VON" 50210 PRINT"2002!!!!! DU ^BERLEGST, OB DU NUN LIE-" 50220 PRINT"BER INS IRRENHAUS, ODER IN DIE ARBEIT" 50230 PRINT"NICHT GEHST. DU ENTSCHEIDEST DICH IN" 50240 PRINT"ANBETRACHT DEINER ZUKUNFT F^R DAS IR-" 50250 PRINT"RENHAUS." 50260 PRINT"DEIN LEBEN VERL]UFT WEITER GANZ NORMAL" 50270 PRINT"UNNORMAL WIE BISHER. DOCH DIESES ERLEB-" 50280 PRINT"NIS WIRST DU NIE WIEDER VERGESSEN, JE-" 50290 PRINT"DENFALLS NICHT BIS ZU DEINEM N]CHSTEN" 50300 PRINT"VOLLRAUSCH..." 50310 GETA$:IFA$=""THEN50310 50320 IFA$<>""THEN50330 50330 GOSUB62000 50380 PRINT"[151]DU HAST DAS GAME GESCHAFFT[151], MANN!!!!" 50390 PRINT"WIE LANGE HAST DU GEBRAUCHT? EINE STD.?" 50400 PRINT"EINE HALBE? ALSO - DIESES GAME WAR DOCH" 50410 PRINT"NUN WIRKLICH BABYLEICHT, ODER? ICH HAB" 50420 PRINT"ES ABER AUCH EHER ZUR [158] UNTERHALTUNG[151]" 50430 PRINT"GESCHRIEBEN. UND UNTERHALTEN HAT ES" 50440 PRINT"DICH HOFFENTLICH, ODER? VIELLEICHT HAST" 50450 PRINT"DU DIR JA AUCH MAL EIN M^DES GRINSEN" 50460 PRINT"ABRINGEN K[NNEN..." 50470 PRINT"[155]DU HAST DEN SCHLU\ NICH KAPIERT? IS" 50480 PRINT"DOCH KLAR! DIESES SPIEL IS IRR, MANN!" 50490 PRINT"DAS HAB ICH DIR DOCH SCHON AM ANFANG" 50500 PRINT"PROPHEZEIHT! ALSO WUNDERE DICH NICH ^-" 50505 GETA$:IFA$=""THEN50505 50506 IFA$<>""THEN50510 50510 PRINT"BER DIE IRRSINNIGE STORY. ICH KANN DIR" 50520 PRINT"JETZT LEIDER KEIN UMWERFENDES ENDRO" 50550 PRINT"PR]SENTIEREN... TUT MIR LEID! DU LIEST" 50560 PRINT"ES GRADE! NA JA, ICH HOFFE, DAS GAME" 50570 PRINT"HAT DIR GEFALLEN! VIELLEICHT VERBRECHE" 50580 PRINT"ICH JA MAL 'NEN 2. TEIL... NEIN! TU MIR" 50590 PRINT"NIX! SO SCHLIMM WAR'S AUCH WIEDER NICH!" 50600 PRINT"ALSO DANN! SERVUS! " 50700 GETA$:IFA$=""THEN50700 50710 IFA$<>""THEN50720 50720 PRINT"#$%SSEUS OF TIGERCREW/20.02.96!" 50730 GETA$:IFA$=""THEN50730 50740 IFA$<>""THEN63480 50750 PRINT"[147][159] THE CREDITS FOR THIS AWFUL GAME:" 50780 PRINT"IDEA: #$%SSEUS/TC" 50790 PRINT"CODING: #$%SSEUS/TC" 50800 PRINT"[155]FONT: #$%SSEUS/TC" 50810 PRINT"MUSIC: SCORPION DESIGNS" 50811 PRINT"[158]SPECIAL EFFECTS: LUKIAN (THANX!)" 50820 PRINT"[150]TESTER: WINNI/TC" 50840 PRINT" DER HOLZF]LLER" 50850 J=J+1 50860 IFJ=1THEN60010 50870 IFJ>1THEN40055 60010 GETA$:IFA$=""THEN60010 60020 IFA$<>""THENGOTO30 62000 POKE53280,.:POKE53281,.:PRINT"[147]":FORC=1TO20:POKE56325,2:POKE646,PEEK(C)+4 62010 PRINT" ** * ***** **** ** * ***" 62020 PRINT" ** * ** ** * ** * ***" 62030 PRINT" ** * ** ** * ** * *** 62040 [153]" *** **** ***** ***** *** 62050 PRINT" ** ** ** * ** * *** 62060 [153]" ** ** ** * ** * 62070 PRINT" ** ***** ** * ** * ***[145][145][145][145][145][145][145][145]" 62080 PRINT"YEAH! DAS NENNE ICH MUSIK![145][145][145][145][145][145][145][145][145][145]":NEXT:POKE56325,58 62090 RETURN 63000 PRINTCHR$(147)"":POKE53281,.:FOR C=0TO90STEP5 :POKE646,C: 63010 PRINT"[145][145][145][145][145] [162] [162][162][162][162] [162][162][162][162] [162][162][162][162][162][162][162][162] [162] [162] [162][162][162][162] [162][162][162][162] 63020 [153]" ++ SGN(null)(null)+ SGN(null)(null)+ SGN(null)USRUSR SGN(null)(null)+ SGNSGN++ SGN(null)(null)+ USR(null)(null)USR 63030 PRINT" [170][170] [180][180][170][186] [180][180][170][186] [180][204][175] [180][204][186][170] [180][204][186][170] [180][180][170][186] [182][181] 63040 [153]" ++ SGN(null)(null)(null) SGN(null)(null)(null) SGN(null)USR SGN(null)(null)+ SGN(null)(null)+ SGN(null)(null)(null) ABSINT 63050 PRINT" [170][170] [180][180][170][170] [180][180][170][170] [180][180] [180][180][170][170] [180][180][170][170] [180][180][170][170] [182][181] 63060 [153]" FRE FRE FRE FRE FRE FRE FRE FRE FRE FRE FRE FRE LOGCOS 63070 NEXTC: 63080 POKE53280,.:PRINTCHR$(147):ZC=208 63090 POKE54296,15:POKE54278,255:POKE54276,17:FORT=1TO20:FORN=0TO14:POKE54273,129 63100 POKE54273,15+ABS(10+T)+N 63110 :NEXTN:NEXTT:POKE54276,0 63120 FOR SP=0TO39:POKE1024+SP,ZC: 63130 POKE55296+SP,RND(0)*16:NEXTSP:POKE54273,0 63140 PRINT" [151][184][146] [150][169][164][164][164][164][164][164][164][164][164][164][223]" 63150 PRINT"[151] [180][146][152][175][175][175][175][175][175][175][175][175][175][175][150][165]HBF. IRRLAND[167]" 63160 PRINT"[151] [180][152][180][180][154][207][183][183][183][208][152][183][183][208][167][155][184][184][183][183][163][163][163][163][163][163][183][183][184][184][146][151][169][164][164][164][164][164][164][164][164][164][164][164][164]"; 63170 PRINT"[151] [180][152][180][180][154][180][207][183][208][170][152] [162][170][167][155][207][176][174][176][174][176][178][178][174][176][174][176][174][155][208][146][151][180][213][195][201] [213][195][201] [213][195][201] "; 63180 PRINT"[151] [180][152][180][180][154][180][149][204][175][186][154][170][152] [184][170][167][155][180][173][189][173][189][171][219][219][179][173][189][173][189][155][186][146][151][180][171][178][179] [171][178][179] [171][178][179] "; 63190 PRINT"[151] [180][152][180][180][154][204][175][175][175][186][152] [170][167][155][204][175][175][175][175][171][189][173][179][155][175][175][175][175][186][146][151][180][194][194][194] [194][194][194] [194][194][194] [155]"; 63200 PRINT"[151][185][180][152][180][180] [170][183][183][208][167][155][171] [162][173][195][195][189][155][162] [179][146][151][180][173][177][189] [173][177][189] [173][177][189] "; 63210 PRINT"[146][129]#[161][152] [204][175][175][175][175][186][175][175][186] [146][129][182]###[181][152][162][162][162][162][146][129][182]################" 63220 PRINT" [220][220][220][220][220][220][220][220][220][220][220][220][220][220][220][220][152][162][162][162][162][162][162][220][220][220][220][220][220][220][220][220][220][220][220][220][220][220][220]" 63230 PRINT"[220][220][220][220][220][220][220][220][220][220][220][220][220][220][220][220][152][162][162][162][162][162][162][162][162][220][220][220][220][220][220][220][220][220][220][220][220][220][220]; 63240 [153]"POKE(null) (null) : : : : : : : : : : : : : : : : : (null)(null)"; 63250 [153]"SIN(null) : : : : : : : : : : : : : : : : : (null)TOTO"; 63260 [153]"WAITLISTNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEW"; 63270 [153]"WAITLISTUSRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR"; 63280 [153]" (null)(null) (null)(null) (null)(null) (null)(null) (null)(null) (null)(null) (null)"; 63290 [153]"TOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTO"; 63300 [153]"POKE (null): : : : : : : : : : : : : : : : : : (null)(null)"; 63310 [153]"(null): : : : : : : : : : : : : : : : : : (null)TOTO"; 63320 [153]"WAITLISTNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEWNEW"; 63330 [153]"USR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USRUSRUSRUSR(null)(null)USR"; 63340 [153]"(null)(null) (null)(null) (null)(null) (null)(null) (null)(null) (null)(null) (null)(null) "; 63350 [153]"TOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOTOONON"; 63360 [129]ZE[178]0[164]24:[151]1024[170]40[172]ZE[170]39,ZC 63370 [151]55296[170]40[172]ZE[170]39,[187](0)[172]16:[130]ZE: 63380 [129] SP[178]39[164]0 [169][171]1:[151]1984[170]SP,ZC 63390 [151]56256[170]SP,[187](0)[172]16:[130]SP: 63400 [151]646,0 63410 [129]ZE[178]24[164]0[169][171]1 :[151]1024[170]40[172]ZE,ZC 63420 [151]55296[170]40[172]ZE,[187](0)[172]16:[130]ZE 63430 [129]X[178]1[164]4000:[130]X:[137]63440 63440 [143] *** AB HIER 'IRRLAND' 63450 [151]53280,0:[151]53281,0:[153]"LOAD" 63460 [129]C[178]0[164]63:[151]646,C 63470 [153]"LOADON IRRFAHRT DURCH IRRLAND":[130]C 63471 [129]X[178]1[164]3000:[130]X:[137]25 63480 [153]"LOADPRINT HERR WURZELSEPP, WIE F^HLEN SIE SICH?":[129]X[178]1[164]2000:[130]X 63481 [129]C[178]0[164]15:[151]646,C: 63490 [153]"LOADONONONONONONONONON ASCLENSTR$VALSTR$LENASC " 63500 [153]" ( ''' )" 63510 [153]" OH, MANN! (null)INT (null)RIGHT$ (null)RIGHT$ ABSRIGHT$" 63520 [153]" PEEKPEEK MID$(null) MID$(null) PEEKPEEK" 63530 [153]" MID$PEEK U PEEK(null)" 63540 [153]" LEFT$ (null)(null)LENRIGHT$(null) CHR$ IST MIR" 63550 [153]" (null) MID$STR$(null) (null) SCHWINDLIG!" 63560 [153]" ( )" 63570 [153]" ICH SAUFE NIE USRLENUSR" 63580 [153]" WIEDER STEP(null) (null)(null)" 63590 [153]" WENIGER... STEP (null) (null) (null) (null) (null)WAIT ABER " 63600 [153]" (null) CHR$ >(null)< LEFT$ (null)WAIT [FTER!":[130]C 63610 [129]T[178]0[164]10:[129]A[178]0[164]17[169].5:[151]53270,A:[130]A,T 63620 [153]"****************************************LIST":[151]53270,11:[153][199](156) 63630 [153]" A U F W I E D E R L A C H E N ": 63640 [153][199](30)"ON" 63650 [161]A$:[139]A$[178]""[167]63650 63660 [139]A$[179][177]""[167][137]50750